home *** CD-ROM | disk | FTP | other *** search
- 44 rem
- 45 rem..add these lines to
- 46 rem.. 'sprite controller'
- 47 rem
- 49 rem=-=-=-=-=-=-=-=-=-=
- 50 rem= sprite sampler =
- 51 rem=-=-=-=-=-=-=-=-=-=
- 55 rem=
- 60 rem= use sprite loader
- 65 rem=or sprite maker/saver
- 70 rem= to put sprite data
- 80 rem= into memory first
- 85 rem
- 90 rem=set multi-color colors:
- 100 c1=15:c2=14:gosub 1700
- 110 for sn=0 to 2
- 120 read bk,cc,xx,yy
- 130 gosub 500 :rem=set ptr
- 140 gosub 800 :rem=set color
- 150 gosub 600 :rem=set x coord
- 160 gosub 700 :rem=set y coord
- 170 gosub 1100:rem=expand x
- 180 gosub 1300:rem=expand y
- 190 gosub 1500:rem=multi-color
- 200 gosub 1800:rem=clr collision
- 210 gosub 2100:rem=set priority
- 220 gosub 900 :rem=turn it on
- 230 next sn
- 240 data 192,0,50,50
- 250 data 193,1,100,100
- 260 data 194,2,200,200
-